home *** CD-ROM | disk | FTP | other *** search
/ My Neighborhood / My Neighborhood.iso / mac / MacFiles / stopLite.Dxr / 00027.ls < prev    next >
Encoding:
Text File  |  1997-11-18  |  914 b   |  43 lines
  1. on exitFrame
  2.   global lastOver
  3.   if rollOver(6) then
  4.     if lastOver <> 6 then
  5.       puppetSound("go")
  6.       updateStage()
  7.       set lastOver to 6
  8.     end if
  9.   else
  10.     if rollOver(7) then
  11.       if lastOver <> 7 then
  12.         puppetSound("stop")
  13.         updateStage()
  14.         set lastOver to 7
  15.       end if
  16.     else
  17.       if rollOver(8) then
  18.         if lastOver <> 8 then
  19.           puppetSound("prepare to stop")
  20.           updateStage()
  21.           set lastOver to 8
  22.         end if
  23.       else
  24.         puppetSound(0)
  25.         set lastOver to 0
  26.       end if
  27.     end if
  28.   end if
  29.   if soundBusy(1) then
  30.     set temp to random(6)
  31.     set temp to temp + 190
  32.     set the castNum of sprite 4 to the number of cast "default head"
  33.     updateStage()
  34.     wait(5)
  35.   else
  36.     puppetSound(0)
  37.     if random(50) = 1 then
  38.       set the castNum of sprite 4 to the number of cast "eyes closed"
  39.       updateStage()
  40.     end if
  41.   end if
  42. end
  43.